
use nat_BLA_data_1945_2020, clear

tsset code year


*3) Histogram of number of BLAs signed by 2020

	gen bla_tot_cat = 0 if bla_totsum==0
	replace bla_tot_cat = 1 if bla_totsum==1
	replace bla_tot_cat = 2 if bla_totsum==2
	replace bla_tot_cat = 3 if bla_totsum>=3 & bla_totsum<=5
	replace bla_tot_cat = 4 if bla_totsum>=6 & bla_totsum<=10
	replace bla_tot_cat = 5 if bla_totsum>=11 & bla_totsum<=50
	replace bla_tot_cat = 6 if bla_totsum>50
	
	#delimit;
	
	graph bar (percent) code if year==2020, over(bla_tot_cat, relabel(1 "0" 2 "1" 3 "2" 
		4 "3-5" 5 "6-10" 6 "11-50" 7 ">50") label(labsize(*0.8))) ylab(#10, labsize(*0.8) angle(0))
		yt("Percent of countries (2020)") graphregion(color(white)) name(bla_tot_hist, replace)
		bar(1, color(gs7));
	
	#delimit cr
